压力1-4
压力1-4与公里标
ggplot(data_long, aes(x = 公里标, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于公里标的散点图",
x = "公里标",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与采样点
ggplot(data_long, aes(x = 采样点, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于采样点的散点图",
x = "采样点",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与垂加基
ggplot(data_long, aes(x = 垂加基, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于垂加基的散点图",
x = "垂加基",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与横加基
ggplot(data_long, aes(x = 横加基, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于横加基的散点图",
x = "横加基",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与温度
ggplot(data_long, aes(x = 温度, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于温度的散点图",
x = "温度",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与垂加
ggplot(data_long, aes(x = 垂加, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于垂加的散点图",
x = "垂加",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与垂加1
ggplot(data_long, aes(x = 垂加1, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于垂加1的散点图",
x = "垂加1",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与垂加2
ggplot(data_long, aes(x = 垂加2, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于垂加2的散点图",
x = "垂加2",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与垂加3
ggplot(data_long, aes(x = 垂加3, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于垂加3的散点图",
x = "垂加3",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与垂加4
ggplot(data_long, aes(x = 垂加4, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于垂加4的散点图",
x = "垂加4",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与滑板1压力
ggplot(data_long, aes(x = 滑板1压力, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于滑板1压力的散点图",
x = "滑板1压力",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与滑板2压力
ggplot(data_long, aes(x = 滑板2压力, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于滑板2压力的散点图",
x = "滑板2压力",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与无补偿接触力
ggplot(data_long, aes(x = 无补偿接触力, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于无补偿接触力的散点图",
x = "无补偿接触力",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与有补偿接触力
ggplot(data_long, aes(x = 有补偿接触力, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于有补偿接触力的散点图",
x = "有补偿接触力",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与空气动力补偿接触力
ggplot(data_long, aes(x = 空气动力补偿接触力, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于空气动力补偿接触力的散点图",
x = "空气动力补偿接触力",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与硬点
ggplot(data_long, aes(x = 硬点, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于硬点的散点图",
x = "硬点",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与冲击
ggplot(data_long, aes(x = 冲击, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于冲击的散点图",
x = "冲击",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与接触拉出值
ggplot(data_long, aes(x = 接触拉出值, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于接触拉出值的散点图",
x = "接触拉出值",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与接触导高
ggplot(data_long, aes(x = 接触导高, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于接触导高的散点图",
x = "接触导高",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与网流
ggplot(data_long, aes(x = 网流, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于网流的散点图",
x = "网流",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与网压
ggplot(data_long, aes(x = 网压, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于网压的散点图",
x = "网压",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与纵加
ggplot(data_long, aes(x = 纵加, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于纵加的散点图",
x = "纵加",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与纵加1
ggplot(data_long, aes(x = 纵加1, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于纵加1的散点图",
x = "纵加1",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与纵加2
ggplot(data_long, aes(x = 纵加2, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于纵加2的散点图",
x = "纵加2",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与纵加3
ggplot(data_long, aes(x = 纵加3, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于纵加3的散点图",
x = "纵加3",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与纵加4
ggplot(data_long, aes(x = 纵加4, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于纵加4的散点图",
x = "纵加4",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与火花次数
ggplot(data_long, aes(x = 火花次数, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于火花次数的散点图",
x = "火花次数",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与火花时间
ggplot(data_long, aes(x = 火花时间, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于火花时间的散点图",
x = "火花时间",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与保留1
ggplot(data_long, aes(x = 保留1, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于保留1的散点图",
x = "保留1",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与保留2
ggplot(data_long, aes(x = 保留2, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于保留2的散点图",
x = "保留2",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与保留3
ggplot(data_long, aes(x = 保留3, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于保留3的散点图",
x = "保留3",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与保留4
ggplot(data_long, aes(x = 保留4, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于保留4的散点图",
x = "保留4",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与速度
ggplot(data_long, aes(x = 速度, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于速度的散点图",
x = "速度",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与非接触导高1
ggplot(data_long, aes(x = 非接触导高1, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于非接触导高1的散点图",
x = "非接触导高1",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与非接触导高2
ggplot(data_long, aes(x = 非接触导高2, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于非接触导高2的散点图",
x = "非接触导高2",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与非接触拉出值1
ggplot(data_long, aes(x = 非接触拉出值1, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于非接触拉出值1的散点图",
x = "非接触拉出值1",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与非接触拉出值2
ggplot(data_long, aes(x = 非接触拉出值2, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于非接触拉出值2的散点图",
x = "非接触拉出值2",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与非接触磨耗1
ggplot(data_long, aes(x = 非接触磨耗1, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于非接触磨耗1的散点图",
x = "非接触磨耗1",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与非接触磨耗2
ggplot(data_long, aes(x = 非接触磨耗2, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于非接触磨耗2的散点图",
x = "非接触磨耗2",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与接触线坡度
ggplot(data_long, aes(x = 接触线坡度, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于接触线坡度的散点图",
x = "接触线坡度",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'

压力1-4与吊悬
ggplot(data_long, aes(x = 吊悬, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于吊悬的散点图",
x = "吊悬",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")+
geom_smooth()
## `geom_smooth()` using method = 'gam' and formula = 'y ~ s(x, bs = "cs")'
## Warning: Failed to fit group 1.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 2.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 3.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.
## Warning: Failed to fit group 4.
## Caused by error in `smooth.construct.cr.smooth.spec()`:
## ! x has insufficient unique values to support 10 knots: reduce k.

压力1-4与功率
ggplot(data_long, aes(x = 功率, y = Pressure_Value, color = Pressure_Type)) +
geom_point(alpha = 0.6) +
labs(
title = "压力1-4 关于功率的散点图",
x = "功率",
y = "压力值",
color = "压力类型"
) +
theme_minimal() +
scale_color_brewer(palette = "Set1")

火花次数
data_long <- reshape(
data = km298,
varying = list(c("火花次数")),
direction = "long",
v.names = "firespark_Value",
timevar = "firespark_Type",
times = c("火花次数")
)
火花次数与公里标
ggplot(km298, aes(x = 公里标, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于公里标的散点图",
x = "公里标",
y = "火花次数"
) +
theme_minimal()

火花次数与采样点
ggplot(km298, aes(x = 采样点, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于采样点的散点图",
x = "采样点",
y = "火花次数"
) +
theme_minimal()

火花次数与压力1
ggplot(km298, aes(x = 压力1, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于压力1的散点图",
x = "压力1",
y = "火花次数"
) +
theme_minimal()

火花次数与压力2
ggplot(km298, aes(x = 压力2, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于压力2的散点图",
x = "压力2",
y = "火花次数"
) +
theme_minimal()

火花次数与压力3
ggplot(km298, aes(x = 压力3, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于压力3的散点图",
x = "压力3",
y = "火花次数"
) +
theme_minimal()

火花次数与压力4
ggplot(km298, aes(x = 压力4, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于压力4的散点图",
x = "压力4",
y = "火花次数"
) +
theme_minimal()

火花次数与垂加基
ggplot(km298, aes(x = 垂加基, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于垂加基的散点图",
x = "垂加基",
y = "火花次数"
) +
theme_minimal()

火花次数与横加基
ggplot(km298, aes(x = 横加基, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于横加基的散点图",
x = "横加基",
y = "火花次数"
) +
theme_minimal()

火花次数与温度
ggplot(km298, aes(x = 温度, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于温度的散点图",
x = "温度",
y = "火花次数"
) +
theme_minimal()

火花次数与垂加
ggplot(km298, aes(x = 垂加, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于垂加的散点图",
x = "垂加",
y = "火花次数"
) +
theme_minimal()

火花次数与垂加1
ggplot(km298, aes(x = 垂加1, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于垂加1的散点图",
x = "垂加1",
y = "火花次数"
) +
theme_minimal()

火花次数与垂加2
ggplot(km298, aes(x = 垂加2, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于垂加2的散点图",
x = "垂加2",
y = "火花次数"
) +
theme_minimal()

火花次数与垂加3
ggplot(km298, aes(x = 垂加3, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于垂加3的散点图",
x = "垂加3",
y = "火花次数"
) +
theme_minimal()

火花次数与垂加4
ggplot(km298, aes(x = 垂加4, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于垂加4的散点图",
x = "垂加4",
y = "火花次数"
) +
theme_minimal()

火花次数与滑板1压力
ggplot(km298, aes(x = 滑板1压力, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于滑板1压力的散点图",
x = "滑板1压力",
y = "火花次数"
) +
theme_minimal()

火花次数与滑板2压力
ggplot(km298, aes(x = 滑板2压力, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于滑板2压力的散点图",
x = "滑板2压力",
y = "火花次数"
) +
theme_minimal()

火花次数与无补偿接触力
ggplot(km298, aes(x = 无补偿接触力, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于无补偿接触力的散点图",
x = "无补偿接触力",
y = "火花次数"
) +
theme_minimal()

火花次数与有补偿接触力
ggplot(km298, aes(x = 有补偿接触力, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于有补偿接触力的散点图",
x = "有补偿接触力",
y = "火花次数"
) +
theme_minimal()

火花次数与空气动力补偿接触力
ggplot(km298, aes(x = 空气动力补偿接触力, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于空气动力补偿接触力的散点图",
x = "空气动力补偿接触力",
y = "火花次数"
) +
theme_minimal()

火花次数与硬点
ggplot(km298, aes(x = 硬点, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于硬点的散点图",
x = "硬点",
y = "火花次数"
) +
theme_minimal()

火花次数与冲击
ggplot(km298, aes(x = 冲击, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于冲击的散点图",
x = "冲击",
y = "火花次数"
) +
theme_minimal()

火花次数与接触拉出值
ggplot(km298, aes(x = 接触拉出值, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于接触拉出值的散点图",
x = "接触拉出值",
y = "火花次数"
) +
theme_minimal()

火花次数与接触导高
ggplot(km298, aes(x = 接触导高, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于接触导高的散点图",
x = "接触导高",
y = "火花次数"
) +
theme_minimal()

火花次数与网流
ggplot(km298, aes(x = 网流, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于网流的散点图",
x = "网流",
y = "火花次数"
) +
theme_minimal()

火花次数与网压
ggplot(km298, aes(x = 网压, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于网压的散点图",
x = "网压",
y = "火花次数"
) +
theme_minimal()

火花次数与纵加
ggplot(km298, aes(x = 纵加, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于纵加的散点图",
x = "纵加",
y = "火花次数"
) +
theme_minimal()

火花次数与纵加1
ggplot(km298, aes(x = 纵加1, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于纵加1的散点图",
x = "纵加1",
y = "火花次数"
) +
theme_minimal()

火花次数与纵加2
ggplot(km298, aes(x = 纵加2, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于纵加2的散点图",
x = "纵加2",
y = "火花次数"
) +
theme_minimal()

火花次数与纵加3
ggplot(km298, aes(x = 纵加3, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于纵加3的散点图",
x = "纵加3",
y = "火花次数"
) +
theme_minimal()

火花次数与纵加4
ggplot(km298, aes(x = 纵加4, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于纵加4的散点图",
x = "纵加4",
y = "火花次数"
) +
theme_minimal()

火花次数与火花时间
ggplot(km298, aes(x = 火花时间, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于火花时间的散点图",
x = "火花时间",
y = "火花次数"
) +
theme_minimal()

火花次数与保留1
ggplot(km298, aes(x = 保留1, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于保留1的散点图",
x = "保留1",
y = "火花次数"
) +
theme_minimal()

火花次数与保留2
ggplot(km298, aes(x = 保留2, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于保留2的散点图",
x = "保留2",
y = "火花次数"
) +
theme_minimal()

火花次数与保留3
ggplot(km298, aes(x = 保留3, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于保留3的散点图",
x = "保留3",
y = "火花次数"
) +
theme_minimal()

火花次数与保留4
ggplot(km298, aes(x = 保留4, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于保留4的散点图",
x = "保留4",
y = "火花次数"
) +
theme_minimal()

火花次数与速度
ggplot(km298, aes(x = 速度, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于速度的散点图",
x = "速度",
y = "火花次数"
) +
theme_minimal()

火花次数与支柱
ggplot(km298, aes(x = 支柱, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于支柱的散点图",
x = "支柱",
y = "火花次数"
) +
theme_minimal()

火花次数与非接触导高1
ggplot(km298, aes(x = 非接触导高1, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于非接触导高1的散点图",
x = "非接触导高1",
y = "火花次数"
) +
theme_minimal()

火花次数与非接触导高2
ggplot(km298, aes(x = 非接触导高2, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于非接触导高2的散点图",
x = "非接触导高2",
y = "火花次数"
) +
theme_minimal()

火花次数与非接触拉出值1
ggplot(km298, aes(x = 非接触拉出值1, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于非接触拉出值1的散点图",
x = "非接触拉出值1",
y = "火花次数"
) +
theme_minimal()

火花次数与非接触拉出值2
ggplot(km298, aes(x = 非接触拉出值2, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于非接触拉出值2的散点图",
x = "非接触拉出值2",
y = "火花次数"
) +
theme_minimal()

火花次数与非接触磨耗1
ggplot(km298, aes(x = 非接触磨耗1, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于非接触磨耗1的散点图",
x = "非接触磨耗1",
y = "火花次数"
) +
theme_minimal()

火花次数与非接触磨耗2
ggplot(km298, aes(x = 非接触磨耗2, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于非接触磨耗2的散点图",
x = "非接触磨耗2",
y = "火花次数"
) +
theme_minimal()

火花次数与接触线坡度
ggplot(km298, aes(x = 接触线坡度, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于接触线坡度的散点图",
x = "接触线坡度",
y = "火花次数"
) +
theme_minimal()

火花次数与吊悬
ggplot(km298, aes(x = 吊悬, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于吊悬的散点图",
x = "吊悬",
y = "火花次数"
) +
theme_minimal()

火花次数与功率
ggplot(km298, aes(x = 功率, y = 火花次数)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花次数关于功率的散点图",
x = "功率",
y = "火花次数"
) +
theme_minimal()

火花时间
火花时间与公里标
ggplot(km298, aes(x = 公里标, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于公里标的散点图",
x = "公里标",
y = "火花时间"
) +
theme_minimal()

火花时间与采样点
ggplot(km298, aes(x = 采样点, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于采样点的散点图",
x = "采样点",
y = "火花时间"
) +
theme_minimal()

火花时间与压力1
ggplot(km298, aes(x = 压力1, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于压力1的散点图",
x = "压力1",
y = "火花时间"
) +
theme_minimal()

火花时间与压力2
ggplot(km298, aes(x = 压力2, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于压力2的散点图",
x = "压力2",
y = "火花时间"
) +
theme_minimal()

火花时间与压力3
ggplot(km298, aes(x = 压力3, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于压力3的散点图",
x = "压力3",
y = "火花时间"
) +
theme_minimal()

火花时间与压力4
ggplot(km298, aes(x = 压力4, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于压力4的散点图",
x = "压力4",
y = "火花时间"
) +
theme_minimal()

火花时间与垂加基
ggplot(km298, aes(x = 垂加基, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于垂加基的散点图",
x = "垂加基",
y = "火花时间"
) +
theme_minimal()

火花时间与横加基
ggplot(km298, aes(x = 横加基, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于横加基的散点图",
x = "横加基",
y = "火花时间"
) +
theme_minimal()

火花时间与温度
ggplot(km298, aes(x = 温度, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于温度的散点图",
x = "温度",
y = "火花时间"
) +
theme_minimal()

火花时间与垂加
ggplot(km298, aes(x = 垂加, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于垂加的散点图",
x = "垂加",
y = "火花时间"
) +
theme_minimal()

火花时间与垂加1
ggplot(km298, aes(x = 垂加1, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于垂加1的散点图",
x = "垂加1",
y = "火花时间"
) +
theme_minimal()

火花时间与垂加2
ggplot(km298, aes(x = 垂加2, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于垂加2的散点图",
x = "垂加2",
y = "火花时间"
) +
theme_minimal()

火花时间与垂加3
ggplot(km298, aes(x = 垂加3, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于垂加3的散点图",
x = "垂加3",
y = "火花时间"
) +
theme_minimal()

火花时间与垂加4
ggplot(km298, aes(x = 垂加4, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于垂加4的散点图",
x = "垂加4",
y = "火花时间"
) +
theme_minimal()

火花时间与滑板1压力
ggplot(km298, aes(x = 滑板1压力, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于滑板1压力的散点图",
x = "滑板1压力",
y = "火花时间"
) +
theme_minimal()

火花时间与滑板2压力
ggplot(km298, aes(x = 滑板2压力, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于滑板2压力的散点图",
x = "滑板2压力",
y = "火花时间"
) +
theme_minimal()

火花时间与无补偿接触力
ggplot(km298, aes(x = 无补偿接触力, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于无补偿接触力的散点图",
x = "无补偿接触力",
y = "火花时间"
) +
theme_minimal()

火花时间与有补偿接触力
ggplot(km298, aes(x = 有补偿接触力, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于有补偿接触力的散点图",
x = "有补偿接触力",
y = "火花时间"
) +
theme_minimal()

火花时间与空气动力补偿接触力
ggplot(km298, aes(x = 空气动力补偿接触力, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于空气动力补偿接触力的散点图",
x = "空气动力补偿接触力",
y = "火花时间"
) +
theme_minimal()

火花时间与硬点
ggplot(km298, aes(x = 硬点, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于硬点的散点图",
x = "硬点",
y = "火花时间"
) +
theme_minimal()

火花时间与冲击
ggplot(km298, aes(x = 冲击, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于冲击的散点图",
x = "冲击",
y = "火花时间"
) +
theme_minimal()

火花时间与接触拉出值
ggplot(km298, aes(x = 接触拉出值, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于接触拉出值的散点图",
x = "接触拉出值",
y = "火花时间"
) +
theme_minimal()

火花时间与接触导高
ggplot(km298, aes(x = 接触导高, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于接触导高的散点图",
x = "接触导高",
y = "火花时间"
) +
theme_minimal()

火花时间与网流
ggplot(km298, aes(x = 网流, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于网流的散点图",
x = "网流",
y = "火花时间"
) +
theme_minimal()

火花时间与网压
ggplot(km298, aes(x = 网压, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于网压的散点图",
x = "网压",
y = "火花时间"
) +
theme_minimal()

火花时间与纵加
ggplot(km298, aes(x = 纵加, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于纵加的散点图",
x = "纵加",
y = "火花时间"
) +
theme_minimal()

火花时间与纵加1
ggplot(km298, aes(x = 纵加1, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于纵加1的散点图",
x = "纵加1",
y = "火花时间"
) +
theme_minimal()

火花时间与纵加2
ggplot(km298, aes(x = 纵加2, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于纵加2的散点图",
x = "纵加2",
y = "火花时间"
) +
theme_minimal()

火花时间与纵加3
ggplot(km298, aes(x = 纵加3, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于纵加3的散点图",
x = "纵加3",
y = "火花时间"
) +
theme_minimal()

火花时间与纵加
ggplot(km298, aes(x = 纵加4, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于纵加4的散点图",
x = "纵加4",
y = "火花时间"
) +
theme_minimal()

火花时间与火花次数
ggplot(km298, aes(x = 火花次数, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于火花次数的散点图",
x = "火花次数",
y = "火花时间"
) +
theme_minimal()

火花时间与保留1
ggplot(km298, aes(x = 保留1, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于保留1的散点图",
x = "保留1",
y = "火花时间"
) +
theme_minimal()

火花时间与保留2
ggplot(km298, aes(x = 保留2, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于保留2的散点图",
x = "保留2",
y = "火花时间"
) +
theme_minimal()

火花时间与保留3
ggplot(km298, aes(x = 保留3, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于保留3的散点图",
x = "保留3",
y = "火花时间"
) +
theme_minimal()

火花时间与保留4
ggplot(km298, aes(x = 保留4, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于保留4的散点图",
x = "保留4",
y = "火花时间"
) +
theme_minimal()

火花时间与速度
ggplot(km298, aes(x = 速度, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于速度的散点图",
x = "速度",
y = "火花时间"
) +
theme_minimal()

火花时间与支柱
ggplot(km298, aes(x = 支柱, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于支柱的散点图",
x = "支柱",
y = "火花时间"
) +
theme_minimal()

火花时间与非接触导高1
ggplot(km298, aes(x = 非接触导高1, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于非接触导高1的散点图",
x = "非接触导高1",
y = "火花时间"
) +
theme_minimal()

火花时间与非接触导高2
ggplot(km298, aes(x = 非接触导高2, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于非接触导高2的散点图",
x = "非接触导高2",
y = "火花时间"
) +
theme_minimal()

火花时间与非接触拉出值1
ggplot(km298, aes(x = 非接触拉出值1, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于非接触拉出值1的散点图",
x = "非接触拉出值1",
y = "火花时间"
) +
theme_minimal()

火花时间与非接触拉出值2
ggplot(km298, aes(x = 非接触拉出值2, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于非接触拉出值2的散点图",
x = "非接触拉出值2",
y = "火花时间"
) +
theme_minimal()

火花时间与非接触磨耗1
ggplot(km298, aes(x = 非接触磨耗1, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于非接触磨耗1的散点图",
x = "非接触磨耗1",
y = "火花时间"
) +
theme_minimal()

火花时间与非接触磨耗2
ggplot(km298, aes(x = 非接触磨耗2, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于非接触磨耗2的散点图",
x = "非接触磨耗2",
y = "火花时间"
) +
theme_minimal()

火花时间与接触线坡度
ggplot(km298, aes(x = 接触线坡度, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于接触线坡度的散点图",
x = "接触线坡度",
y = "火花时间"
) +
theme_minimal()

火花时间与吊悬
ggplot(km298, aes(x = 吊悬, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于吊悬的散点图",
x = "吊悬",
y = "火花时间"
) +
theme_minimal()

火花时间与功率
ggplot(km298, aes(x = 功率, y = 火花时间)) +
geom_point(alpha = 0.6, color = "steelblue") + # 直接设置颜色参数
labs(
title = "火花时间关于功率的散点图",
x = "功率",
y = "火花时间"
) +
theme_minimal()
